version 14
clear all
set more off

***************************************************************************************************
*THIS FILE PRODUCES FIGURE A.I OF SLEMROD-REHMAN-WASEEM-2020, RESTAT
***************************************************************************************************

import 		delimited "$project_data\google_trends.csv" ,clear
gen 			date=date( month,"20YM")
format 		date %td
tsset 		date
twoway  		(tsline  fbrtaxdirectorypakistan, sort lcolor(red) mcolor(red) msize(large) msymbol(S) ///
				tline(01apr2014 01apr2015 01sep2016 01aug2017, lcolor(black) lpattern(dash))) ///
				(tsline  taxdirectorypakistan,sort lcolor(midblue) mcolor(midblue) msize(midblue)  msymbol(D) tlabel(01jan2012(366)01jan2018,format(%tdmY))), ///
				yscale(titlegap(*10)) ylabel(0(25)100) ytitle("Relative Search Interest") ///
				xtitle("Time - Month/Year") xscale(titlegap(*10)) ///
				legend(region(style(none)) label(1 "FBR Tax Directory") label(2 "Tax Directory") order(1 2)) ///
				graphregion(fcolor(white) style(none) color(white) margin(0 3 0 2)) bgcolor(white)
graph 		export "$project_output\google_trends.eps", replace
